home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2009 December / maximum-cd-2009-12.iso / DiscContents / gimp-2.7.0-i686-setup.exe / {app} / share / gimp / 2.0 / scripts / copy-visible.scm < prev    next >
Encoding:
GIMP Script-Fu Script  |  2009-08-19  |  1.8 KB  |  50 lines
  1. ; GIMP - The GNU Image Manipulation Program
  2. ; Copyright (C) 1995 Spencer Kimball and Peter Mattis
  3. ;
  4. ; "Copy Visible" -- copy the visible selection so that it can be pasted easily
  5. ; Copyright (C) 2004 Rapha├½l Quinet, Adrian Likins, Sven Neumann
  6. ;
  7. ; This program is free software: you can redistribute it and/or modify
  8. ; it under the terms of the GNU General Public License as published by
  9. ; the Free Software Foundation; either version 3 of the License, or
  10. ; (at your option) any later version.
  11. ;
  12. ; This program is distributed in the hope that it will be useful,
  13. ; but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15. ; GNU General Public License for more details.
  16. ;
  17. ; You should have received a copy of the GNU General Public License
  18. ; along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19. ;
  20. ; 2004-04-14 This script was almost rewritten from scratch
  21. ;     by Rapha├½l Quinet <raphael@gimp.org>
  22. ;     see also http://bugzilla.gnome.org/show_bug.cgi?id=139989
  23. ;
  24. ; The code is new but the API is the same as in the previous version:
  25. ; "Copy Visible"  version 0.11 01/24/98
  26. ;     by Adrian Likins <adrian@gimp.org>
  27. ;   _heavily_ based on:
  28. ;        cyn-merge.scm   version 0.02   10/10/97
  29. ;        Copyright (C) 1997 Sven Neumann (neumanns@uni-duesseldorf.de)
  30. ;
  31. ; Removed all code and made it a backward-compat wrapper around
  32. ;     (gimp-edit-copy-visible)
  33. ;     2004-12-12 Michael Natterer <mitch@gimp.org>
  34. ;
  35.  
  36. (define (script-fu-copy-visible image drawable)
  37.   (gimp-edit-copy-visible image)
  38. )
  39.  
  40. (script-fu-register "script-fu-copy-visible"
  41.   "Copy Visible"
  42.   "This procedure is deprecated! use \'gimp-edit-copy-visible\' instead."
  43.   ""
  44.   ""
  45.   ""
  46.   "RGB* INDEXED* GRAY*"
  47.   SF-IMAGE    "Image"    0
  48.   SF-DRAWABLE "Drawable" 0
  49. )
  50.